inherited frmDynamicEditFormSet: TfrmDynamicEditFormSet
  Left = 311
  Top = 170
  Caption = #21160#24577#31383#20307#24067#23616
  ClientHeight = 453
  ClientWidth = 832
  Position = poOwnerFormCenter
  OnResize = FormResize
  ExplicitWidth = 848
  ExplicitHeight = 515
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter2: TcxSplitter [2]
    Left = 234
    Top = 0
    Width = 8
    Height = 412
    HotZoneClassName = 'TcxSimpleStyle'
  end
  object Splitter1: TcxSplitter [3]
    Left = 555
    Top = 0
    Width = 8
    Height = 412
    HotZoneClassName = 'TcxSimpleStyle'
  end
  object Panel3: TPanel [4]
    Left = 563
    Top = 0
    Width = 269
    Height = 412
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel3'
    TabOrder = 3
    object cxGridUser: TcxGrid
      Left = 0
      Top = 0
      Width = 124
      Height = 412
      Align = alClient
      TabOrder = 0
      OnEnter = cxGridUserEnter
      object ViewUser: TcxGridDBTableView
        PopupMenu = pmUser
        OnMouseDown = ViewUserMouseDown
        Navigator.Buttons.CustomButtons = <>
        DataController.DataModeController.GridMode = True
        DataController.DataSource = dsDynUser
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <
          item
            Kind = skCount
            FieldName = 'ET_EditForm_ID'
          end>
        DataController.Summary.SummaryGroups = <>
        OptionsBehavior.IncSearch = True
        OptionsData.Appending = True
        OptionsView.ColumnAutoWidth = True
        OptionsView.Footer = True
        OptionsView.GroupByBox = False
        Styles.Background = MainDM.bslBackGroup
        Styles.ContentEven = MainDM.bsEven
        Styles.ContentOdd = MainDM.bsOdd
        Styles.Footer = MainDM.bsTitle
        Styles.Header = MainDM.bsTitle
        Styles.Selection = MainDM.bsSelect
        object ViewUserID: TcxGridDBColumn
          Caption = #25805#20316#21592
          DataBinding.FieldName = 'userid'
          PropertiesClassName = 'TcxLookupComboBoxProperties'
          Properties.GridMode = True
          Properties.ImmediatePost = True
          Properties.KeyFieldNames = 'ui_userid'
          Properties.ListColumns = <
            item
              FieldName = 'ui_usercode'
            end
            item
              FieldName = 'ui_username'
            end>
          HeaderAlignmentHorz = taCenter
          Width = 160
        end
      end
      object cxGridLevel2: TcxGridLevel
        GridView = ViewUser
      end
    end
    object grdUserGroup: TcxGrid
      Left = 124
      Top = 0
      Width = 145
      Height = 412
      Align = alRight
      TabOrder = 1
      OnEnter = cxGridUserEnter
      object viewUserGroup: TcxGridDBTableView
        PopupMenu = pmUser
        OnMouseDown = viewUserGroupMouseDown
        Navigator.Buttons.CustomButtons = <>
        DataController.DataModeController.GridMode = True
        DataController.DataSource = dsDynUserGroup
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsData.Appending = True
        OptionsView.ColumnAutoWidth = True
        OptionsView.Footer = True
        OptionsView.GroupByBox = False
        Styles.Background = MainDM.bslBackGroup
        Styles.ContentEven = MainDM.bsEven
        Styles.ContentOdd = MainDM.bsOdd
        Styles.Footer = MainDM.bsTitle
        Styles.Header = MainDM.bsTitle
        Styles.Selection = MainDM.bsSelect
        object colUserGroup: TcxGridDBColumn
          Caption = #25805#20316#21592#32452
          DataBinding.FieldName = 'groupid'
          PropertiesClassName = 'TcxLookupComboBoxProperties'
          Properties.GridMode = True
          Properties.ImmediatePost = True
          Properties.KeyFieldNames = 'ut_usergroupid'
          Properties.ListColumns = <
            item
              FieldName = 'UT_UserGroupNM'
            end>
          Properties.ListOptions.SyncMode = True
          HeaderAlignmentHorz = taCenter
          Width = 160
        end
      end
      object lvlUserGroup: TcxGridLevel
        GridView = viewUserGroup
      end
    end
  end
  object pnlTree: TPanel [5]
    Left = 0
    Top = 0
    Width = 234
    Height = 412
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 0
    DesignSize = (
      234
      412)
    object trBType: TcxTreeView
      Left = 6
      Top = 7
      Width = 225
      Height = 400
      Anchors = [akLeft, akTop, akRight, akBottom]
      PopupMenu = pmSecDev
      Style.HotTrack = False
      Style.Shadow = True
      TabOrder = 0
      OnClick = trBTypeClick
      AutoExpand = True
      Images = ImageList1
      ReadOnly = True
      StateImages = ImageList1
    end
  end
  object pnlBottom: TPanel [6]
    Left = 0
    Top = 412
    Width = 832
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 4
    DesignSize = (
      832
      41)
    object btnOK: TcxButton
      Left = 661
      Top = 8
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = #30830#23450
      TabOrder = 3
      OnClick = btnOKClick
    end
    object btnCancel: TcxButton
      Left = 747
      Top = 8
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Cancel = True
      Caption = #21462#28040
      ModalResult = 2
      TabOrder = 4
      OnClick = btnCancelClick
    end
    object btnBackupAll: TcxButton
      Left = 9
      Top = 8
      Width = 75
      Height = 25
      Caption = #22791#20221#20840#37096#24067#23616
      TabOrder = 0
      OnClick = btnBackupAllClick
    end
    object btnRestoreAll: TcxButton
      Left = 99
      Top = 8
      Width = 75
      Height = 25
      Caption = #24674#22797#20840#37096#24067#23616
      TabOrder = 1
      OnClick = btnRestoreAllClick
    end
    object btnRestoreDef: TcxButton
      Left = 239
      Top = 8
      Width = 75
      Height = 25
      Caption = #24674#22797#40664#35748#24067#23616
      TabOrder = 2
      OnClick = btnRestoreDefClick
    end
    object btnSave: TcxButton
      Left = 478
      Top = 8
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = #20445#23384
      TabOrder = 5
      OnClick = btnSaveClick
    end
  end
  inherited Panel1: TPanel
    Width = 825
    Height = 10
    ExplicitWidth = 825
    ExplicitHeight = 10
    DesignSize = (
      825
      10)
    inherited img3: TImage
      Left = 320
      Top = -54
      ExplicitLeft = 320
      ExplicitTop = -54
    end
    inherited labFuncName: TcxLabel
      Caption = #21160#24577#32534#36753#31383#20307#35774#32622
      ExplicitWidth = 100
    end
  end
  inherited pnlMain: TPanel
    Left = 242
    Width = 313
    Height = 412
    Align = alLeft
    TabOrder = 2
    ExplicitLeft = 242
    ExplicitWidth = 313
    ExplicitHeight = 412
    inherited MainDataGrid: TcxGrid
      Width = 313
      Height = 373
      ExplicitWidth = 313
      ExplicitHeight = 373
      inherited MainDataGridDBTableView: TcxGridDBTableView
        OnDblClick = MainDataGridDBTableViewDblClick
        OptionsData.DeletingConfirmation = False
        OptionsData.Inserting = False
        OptionsView.ColumnAutoWidth = True
        object MainDataGridDBTableViewET_FormType: TcxGridDBColumn
          DataBinding.FieldName = 'ET_FormType'
          Width = 89
        end
        object MainDataGridDBTableViewET_FormCaption: TcxGridDBColumn
          DataBinding.FieldName = 'ET_FormCaption'
          Width = 125
        end
        object MainDataGridDBTableViewET_LayoutName: TcxGridDBColumn
          DataBinding.FieldName = 'ET_LayoutName'
        end
      end
    end
    object barDyn: TToolBar
      Left = 0
      Top = 373
      Width = 313
      Height = 39
      Align = alBottom
      ButtonHeight = 35
      ButtonWidth = 49
      Images = MainDM.imgList
      ShowCaptions = True
      TabOrder = 1
      object btnDynNew: TToolButton
        Left = 0
        Top = 0
        Caption = #26032#22686'(&N)'
        ImageIndex = 6
        OnClick = btnDynNewClick
      end
      object btnDynModify: TToolButton
        Left = 49
        Top = 0
        Caption = #20462#25913'(&E)'
        ImageIndex = 7
        OnClick = btnDynModifyClick
      end
      object btnDynDelete: TToolButton
        Left = 98
        Top = 0
        Caption = #21024#38500'(&D)'
        ImageIndex = 8
        OnClick = btnDynDeleteClick
      end
    end
  end
  inherited MainDataSource: TDataSource
    Left = 265
    Top = 25
  end
  inherited ImageList1: TImageList
    Left = 23
    Top = 279
  end
  inherited MainMenu1: TMainMenu
    Left = 26
    Top = 16
  end
  inherited ActionList1: TActionList
    Left = 33
    Top = 211
  end
  inherited PopupMenu1: TPopupMenu
    Left = 144
    Top = 282
  end
  inherited qyTmpDataSet: TUniQuery
    Left = 174
    Top = 14
  end
  inherited MainDataSetU: TUniQuery
    SQL.Strings = (
      'SELECT * '
      'FROM ts_DynamicEditFormMst')
    AfterScroll = MainDataSetUAfterScroll
    object MainDataSetUET_EditFormID: TIntegerField
      DisplayLabel = #31383#20307#32534#21495
      FieldName = 'ET_EditFormID'
    end
    object MainDataSetUET_FormCaption: TWideStringField
      DisplayLabel = #31383#20307#26631#39064
      FieldName = 'ET_FormCaption'
      OnGetText = MainDataSetUET_FormCaptionGetText
      Size = 30
    end
    object MainDataSetUET_Menu_Auto_ID: TIntegerField
      DisplayLabel = #33756#21333#32534#21495
      FieldName = 'ET_Menu_Auto_ID'
    end
    object MainDataSetUET_Table_Name: TStringField
      DisplayLabel = #34920#21517
      FieldName = 'ET_Table_Name'
      Size = 50
    end
    object MainDataSetUET_Parent_EditForm_ID: TIntegerField
      DisplayLabel = #29238#31383#20307#32534#21495
      FieldName = 'ET_Parent_EditForm_ID'
    end
    object MainDataSetUET_KeyFields: TStringField
      DisplayLabel = #26412#34920#20851#32852#23383#27573
      FieldName = 'ET_KeyFields'
      Size = 200
    end
    object MainDataSetUET_LookupField: TStringField
      DisplayLabel = #29238#34920#20851#32852#23383#27573
      FieldName = 'ET_LookupField'
      Size = 50
    end
    object MainDataSetUCREATE_TIME: TDateTimeField
      DisplayLabel = #24314#26723#26102#38388
      FieldName = 'CREATE_TIME'
    end
    object MainDataSetUET_ISInitOpenData: TBooleanField
      DisplayLabel = #25171#24320#31383#20307#21363#26174#31034#25968#25454
      FieldName = 'ET_ISInitOpenData'
    end
    object MainDataSetUET_FormType: TIntegerField
      DisplayLabel = #31383#20307#31867#22411
      FieldName = 'ET_FormType'
    end
    object MainDataSetUET_LayoutID: TIntegerField
      FieldName = 'ET_LayoutID'
    end
    object MainDataSetUET_LayoutName: TWideStringField
      DisplayLabel = #24067#23616#21517#31216
      FieldName = 'ET_LayoutName'
      Size = 30
    end
    object MainDataSetUET_DtlTableName: TStringField
      FieldName = 'ET_DtlTableName'
      Size = 50
    end
    object MainDataSetUET_CodeField: TStringField
      FieldName = 'ET_CodeField'
      Size = 50
    end
    object MainDataSetUCREATE_BY: TIntegerField
      FieldName = 'CREATE_BY'
    end
    object MainDataSetUET_TableWhere: TStringField
      FieldName = 'ET_TableWhere'
      Size = 2000
    end
    object MainDataSetUET_Groupid: TIntegerField
      FieldName = 'ET_Groupid'
    end
  end
  object qryDynUser: TUniQuery
    SQLInsert.Strings = (
      'Insert into TS_DYNUSER(editformid,'
      'layoutid,'
      'userid,'
      'groupid'
      ')'
      'Values'
      '(:editformid,'
      ':layoutid,'
      ':userid,'
      ':groupid)')
    SQLDelete.Strings = (
      
        'Delete from TS_DYNUSER where editformid=:OLD_editformid and layo' +
        'utid=:OLD_layoutid and userid=:OLD_userid and groupid=:OLD_group' +
        'id')
    SQLUpdate.Strings = (
      'Update TS_DYNUSER set '
      'editformid=:editformid,'
      'layoutid=:layoutid,'
      'userid=:userid,'
      'groupid=:groupid'
      
        ' where editformid=:OLD_editformid and layoutid=:OLD_layoutid and' +
        ' userid=:OLD_userid and groupid=:OLD_groupid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select * from ts_dynuser')
    CachedUpdates = True
    BeforePost = qryDynUserBeforePost
    OnNewRecord = qryDynUserNewRecord
    Left = 548
    Top = 86
    object qryDynUsereditformid: TIntegerField
      FieldName = 'editformid'
    end
    object qryDynUserlayoutid: TIntegerField
      FieldName = 'layoutid'
    end
    object qryDynUseruserid: TIntegerField
      FieldName = 'userid'
    end
    object qryDynUsergroupid: TIntegerField
      FieldName = 'groupid'
    end
  end
  object dsDynUser: TDataSource
    DataSet = qryDynUser
    Left = 542
    Top = 30
  end
  object pmUser: TPopupMenu
    OnPopup = pmUserPopup
    Left = 591
    Top = 252
    object muUserNew: TMenuItem
      Caption = #26032#22686#25805#20316#21592
      OnClick = muUserNewClick
    end
    object muNewUserGroup: TMenuItem
      Caption = #26032#22686#25805#20316#21592#32452
      OnClick = muNewUserGroupClick
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object muUserDelete: TMenuItem
      Caption = #21024#38500#25805#20316#21592
      OnClick = muUserDeleteClick
    end
    object muDelUserGroup: TMenuItem
      Caption = #21024#38500#25805#20316#21592#32452
      OnClick = muDelUserGroupClick
    end
  end
  object pmSecDev: TPopupMenu
    OnPopup = pmSecDevPopup
    Left = 112
    Top = 160
    object muNewSecDev: TMenuItem
      Caption = #26032#22686#20108#27425#24320#21457
      OnClick = muNewSecDevClick
    end
    object muEditSecDev: TMenuItem
      Caption = #20462#25913#20108#27425#24320#21457
      OnClick = muEditSecDevClick
    end
    object muDelSecDev: TMenuItem
      Caption = #21024#38500#20108#27425#24320#21457
      OnClick = muDelSecDevClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object muBackSecDev: TMenuItem
      Caption = #22791#20221#20108#27425#24320#21457
      OnClick = muBackSecDevClick
    end
    object muRestoreSecDev: TMenuItem
      Caption = #24674#22797#20108#27425#24320#21457
      OnClick = muRestoreSecDevClick
    end
  end
  object qryDynUserGroup: TUniQuery
    SQLInsert.Strings = (
      'Insert into TS_DYNUSERgroup(editformid,'
      'layoutid,'
      'groupid,'
      'reportgroupid'
      ')'
      'Values'
      '(:editformid,'
      ':layoutid,'
      ':groupid,'
      ':reportgroupid)')
    SQLDelete.Strings = (
      
        'Delete from TS_DYNUSERGroup where editformid=:OLD_editformid and' +
        ' layoutid=:OLD_layoutid and groupid=:OLD_groupid')
    SQLUpdate.Strings = (
      'Update TS_DYNUSERGroup set '
      'editformid=:editformid,'
      'layoutid=:layoutid,'
      'groupid=:groupid,'
      'reportgroupid=:reportgroupid'
      
        ' where editformid=:OLD_editformid and layoutid=:OLD_layoutid and' +
        ' groupid=:OLD_groupid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select * from ts_dynusergroup')
    CachedUpdates = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    BeforePost = qryDynUserGroupBeforePost
    OnNewRecord = qryDynUserGroupNewRecord
    Left = 716
    Top = 99
  end
  object dsDynUserGroup: TDataSource
    DataSet = qryDynUserGroup
    Left = 764
    Top = 143
  end
end
